home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / COMLR.z / COMLR
Text File  |  1996-03-14  |  4KB  |  67 lines
  1.  
  2.  
  3.  
  4. ____CCCCOOOOMMMMLLLLRRRR((((3333FFFF))))                                                          ____CCCCOOOOMMMMLLLLRRRR((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      COMLR, SCOMLR   -  EISPACK routine.  This subroutine finds the
  10.      eigenvalues of a COMPLEX UPPER Hessenberg matrix by the modified LR
  11.      method.
  12.  
  13.  
  14. SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
  15.           ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee  ccccoooommmmllllrrrr((((nnnnmmmm,,,, nnnn,,,, lllloooowwww,,,, iiiigggghhhh,,,, hhhhrrrr,,,, hhhhiiii,,,, wwwwrrrr,,,, wwwwiiii,,,, iiiieeeerrrrrrrr))))
  16.           iiiinnnntttteeeeggggeeeerrrr          nnnnmmmm,,,, nnnn,,,, lllloooowwww,,,, iiiigggghhhh,,,, iiiieeeerrrrrrrr
  17.           ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn hhhhrrrr((((nnnnmmmm,,,,nnnn)))),,,, hhhhiiii((((nnnnmmmm,,,,nnnn)))),,,, wwwwrrrr((((nnnn)))),,,, wwwwiiii((((nnnn))))
  18.  
  19.           ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssccccoooommmmllllrrrr((((nnnnmmmm,,,, nnnn,,,, lllloooowwww,,,, iiiigggghhhh,,,, hhhhrrrr,,,, hhhhiiii,,,, wwwwrrrr,,,, wwwwiiii,,,, iiiieeeerrrrrrrr))))
  20.           iiiinnnntttteeeeggggeeeerrrr          nnnnmmmm,,,, nnnn,,,, lllloooowwww,,,, iiiigggghhhh,,,, iiiieeeerrrrrrrr
  21.           rrrreeeeaaaallll             hhhhrrrr((((nnnnmmmm,,,,nnnn)))),,,, hhhhiiii((((nnnnmmmm,,,,nnnn)))),,,, wwwwrrrr((((nnnn)))),,,, wwwwiiii((((nnnn))))
  22.  
  23.  
  24.  
  25. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  26.      On INPUT
  27.  
  28.      NNNNMMMM must be set to the row dimension of two-dimensional array parameters
  29.      as declared in the calling program dimension statement.
  30.  
  31.      NNNN is the order of the matrix.
  32.  
  33.      LLLLOOOOWWWW and IGH are integers determined by the balancing subroutine  CBAL.
  34.      If  CBAL  has not been used, set LOW=1, IGH=N.
  35.  
  36.      HHHHRRRR and HI contain the real and imaginary parts, respectively, of the
  37.      complex upper Hessenberg matrix.  Their lower triangles below the
  38.      subdiagonal contain the multipliers which were used in the reduction by
  39.      COMHES, if performed.  On OUTPUT The upper Hessenberg portions of HR and
  40.      HI have been destroyed.  Therefore, they must be saved before calling
  41.      COMLR  if subsequent calculation of eigenvectors is to be performed.
  42.  
  43.      WWWWRRRR and WI contain the real and imaginary parts, respectively, of the
  44.      eigenvalues.  If an error exit is made, the eigenvalues should be correct
  45.      for indices IERR+1,...,N.
  46.  
  47.      IIIIEEEERRRRRRRR is set to Zero       for normal return, J          if the J-th
  48.      eigenvalue has not been
  49.         determined after a total of 30*N iterations.  Calls CSROOT for complex
  50.      square root.  Calls CDIV for complex division.  Questions and comments
  51.      should be directed to B. S. Garbow, APPLIED MATHEMATICS DIVISION, ARGONNE
  52.      NATIONAL LABORATORY
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.